close all
v=[2.5 1];
w=[3 0];

vp=dot(v,w)*w/dot(w,w);

o=[0 0];

ceuArrow(o,vp,'b',2)
ceuArrow(v,vp,'k',2,':',0)
ceuArrow(vp,w,'r',2)
ceuArrow(o,v,'b',2)
axis square
grid on
axis([-1 4 -0.5 1.5])
xlabel('x_1')
ylabel('x_2')
text(v(1)+0.1,v(2)+0.1,'v','FontSize',14)
text(w(1)+0.1,w(2)+0.1,'w','FontSize',14)
text(vp(1)-0.1,vp(2)-0.15,'v''','FontSize',14)


